source("C:/Users/chrs0003/Desktop/FOX_R/R/DataAnalysis/HRTests/init.R")


resRadius250 <- compareHRMobile(data=radius250HR , resultsPath=HR_RESULTS_PATH, writeResults=writeResults,
                              iterations=iterations, kernelPercent=kernelPercent, mcpPercent=mcpPercent, 
                              kernelh=kernelh, name="radius250LC32")